











2 .BY BOB HENSEL 

S :RETURN ;CLEAR 

6 4-8; Y=16; Z=-16 

f NT=1;S=0; T= 

8 BC=126;FC=249 

3 GOSUB 44@00;BOX @,4,50,89,1 
16 

26 

25 





A=AK+TKNE 4 628 

Y=T+KNC 2 Jc 2B 

Z2=Z+KNC 1 Ic2B 2268 . TREE 
— 34 T=T+1;S=S+1 2205 C=Cb4@ 

















































1@8 BOX X,-39,58,8,1 2216 BOX X+C,-28,2,2,3 
185 BOX X,-36,2,2,3 2226 BOX X+C,-36,4,2,3 
11@ IF P>@BOX X,-39,6,8,3;P=P-1 2238 BOX X+C,-32,6,2,3 
19@ IF A=@BOX Y,-8,2,4,3 2240 BOX X+C,-34,8,2,3 
266 IF B=@BOX Z,-16,3,4,3 2256 BOX X+C,-36,10,2,3 
242 IF T<LGOTO 299 2266 BOX X+C,-48,2,6,3 
245 C=1;IF *>@C=-1 2276 RETURN 
247 GOSUB 184@+1@@bRND 1a) 2368 .SIGN 
249 GOTO 299 2303 IF P>BRETURN 
299 IF T-L=@T=aA 2385 C=CbSa 
308 CY=-40;CX=-77;PRINT | 2320 BOX X+C,-29,12,12,3 
3@1 CX=-7@;CY=4@;PRINT #1,S 2325 BOX X+C,-29,8,8,3 
382 IF A>@BIF B>BGOTO 3088 2338 CX=X+C;CY=-29;PRINT "P*, 
385 IF A>BGOTO 3aB . 2335 LINE CX-9,CY-4,4;LINE CxX-3,CY+2,1 
31@ IF PXCY,@)=1GOSUB 1908 2336 P=15 
350 BOX Y,8,2,4,3 234@ BOX X+C,-39,2,8,3 
380 IF B>@GOTO 18 2358 RETURN 
396 IF PX(Z,-8)=1GOSUB 1asea 24288 .LOG 
408 BOX Z,-8,3,4,3 2419 BOX X-3,-38,24,5,2 
786 GOTO 1a 2415 BOX X-10,-41,2,4,2; BOX X+3, -41,2,4,2 
1@80 CX=Y;CY=0;PRINT “*", 2420 RETURN 
1885 A=S | ' | 2588 .CRASH 
19148 GOTO 1@6o 
1@58 CX=Z;CY=-8;PRINT "*", 
1@55 B=s 
1868 NT=18;MU=67;MU=67; MU675MU=67 5 NT=1; RETURN 
1986 . TRUCK 
19@5 C=Cb1i2 by ! tas . 
1987 BOX X+C,-32,5,5,3 BOX: X+8, -28, 19,4,2 Bob Hensel 
1916 BOX X+C+4, -32, 1,2,;3 GOSUB 1922 8428 Ingleside fve., S 
1928 BOX x+C-4, “32, 1,2," RETURN Cottage Grove, MN 55816 
a a a C=-1bC;GOTO 1998 
|28@2 IF ABS(C)>1GOTO 2818 C=-1bC;GOTO 2a8a 
2860S C=Cbhi2 RETURN 
2818 BOX X+C,-39,5,8,3 END | 
pk a ot Se — a poets CY=-40;CX=-23;PRINT “GAME OVER"3;FOR K=1TO 19@0;NEXT K 
2048 BOX X4C44,-41.4, a ! CLEAR ;CY=24;PRINT * | SCORE" ; PRINT 
’ PRINT “ PLAYER 1 PLAYER 2 
2@5@ BOX X+C-4,-41,1,2,3 PRINT 
12064 RETURN PRINT B," “A 
2198 .HOUSE STOP 
2185 C=Cb45 TITLE 
£118 BOX A+C, 30,00, ae CY=@;PRINT "  BALLY 5 @ @";CY=-8;CX=-6;PRINT 
2126 BOX X+C,-32,8,2,3 PRINT * BOB HENSEL : 
2136 BOX X+C,-36,16,2,1 PRINT 
e108 BOR tC 2 ae INPUT “ SKILL LEVEL="L;CLEAR ;RETURN 





215@ BOX X+C+2, -48,2, 4, 3 
2168 RETURN 
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CLEAR 
NT=2 | . | 
1@ BC=8;FC=1aa ; 
2@ PRINT ;PRINT 


















































DEFUSE is a three-dimensiona! 
guessing game where you have to 
locate a point in the. center 





3@ PRINT! ee using “hot-cold’ type clues. 
35 PRINT . 

4@ PRINT " NEED INSTRUCTIONS?" : 

41 PRINT . 469 PRINT " WIDE",B 

45 PRINT " PRESS 1 FOR YES"| 47@ PRINT " HIGH",C 

46 PRINT | 498 PRINT 

S@ PRINT "“ PRESS 2 FOR NO" | 495 PRINT "WANT TO PLAY AGAIN?" 

Si PRINT S@@ PRINT ” PRESS IL" 

SS FOR H=1TO 2488 S@S PRINT 

66 IF &(€23)=8GOTO 3a 514 IF &(23)=8GOTO 262 

65 IF &€22)=860TO 268. SiS GOTO S128 

7@ NEXT H - . S28 GOTO 9ae8 

80 FC=9;GOTO 4@ S25 PRINT ;PRINT 
98 CLEAR 53@ PRINT “ BOMB DEFUSED AT __",G, "SECONDS"; GOTO 492 
180 PRINT S48 IF D>a99GOTO 610. 


11@ PRINT “ YOU ARE IN A GOVERNNMENT"| scg IF p<@goTo 618 
128 PRINT “EXPERIMENTAL BUILDING WITH"| seg IF E>S9GOTO 618 


13@ PRINT " 1,606,866 ROOMS IN IT." S7@ IF E<@GoTO 618 

14@ PRINT “ 1@@ LONG(@a99)" | 5S9@ IF F>99GOTO 65a 

158 PRINT " 166 WIDE(@a99)" S98 IF F<@coTo Esa 

166 PRINT "“ 16@ HIGH(@a99) 6a@@ GOTO 315 

17@ PRINT “ IN IT A BOMB IS HIDDEN “ | 61g PRINT “ YOU WALKED OUT A WINDOW" 
18@ PRINT " THE BOMB SENDS OUT " 62@ PRINT "ON THE";IF F<4GOTO 74a 
13@ PRINT “ SIGNALS THAT GET STRONGER" | 625 PRINT F,“TH FLOOR! !!1" 

264 PRINT “ AS YOU GET CLOSER" °63@ PRINT " YOU WERE KILLED AND" 


214 PRINT “ YOU HAVE 264. SECONDS “| 64@ PRINT 2@8-G, "SECONDS LATER" 


22@ PRINT “ TO DEACTIVATE IT = " | 65@ PRINT “ THE BUILDING BLEW UP!!!";GOoTO 492 
266 CLEAR } | 666 PRINT * YOU ARE NOW",FbS 
276 A=RND (186);B=RND (160) 67@ PRINT “ FEET IN THE AIR! !!!";GOTO 63a 
| 280 C=RND (166);IF ASBGOTO 318 ' 1688 PRINT " YOU ARE NOW " , -1b(Fb9) 
298 IF B>@GOTO 316 698 PRINT " FEET UNDERGROUND! !!!";GOTO 63a 
366 IF C=8G0TO 288 , : ‘?74@-IF F=1G0TO 77a 
318 D=@;E=@;F=8;6-0 | 75@ IF F=2GoTo 78a 
31S PRINT 769 IF F=3GOTO 798 
324 PRINT “ SIGNAL", 1aaaa- CC A+B+Cb 108 )- (CD+E+F b 180) } | 
= gine RR edi , 77@-PRINT " 1ST FLOOR";GOTO 630 
gob: acter .* wep oe | 784 PRINT “ 2ND FLOOR";GOTO 638 
: ha 7398 " 3RD FLOOR";GOTO 6308 
368 PRINT " SECONDS",G a ee) : : 
365 PRING 818 GOTO 490 
378 INPUT D,E,F; CLEAR ;G=G+10;IF AFDGOTO 4ag | 
384 IF BEGOTO 40g ‘Dieter Heinerman _ 
398 IF C=FGOTO 525 |. S85 4th Ave SW #1511 
444 IF G=268GOTO 428 : _ Calgary,Alberta, Canada 
41@ GOTO 548 12P o78s 
420 PRINT “ BOOOOOMMM !!! YOU BLEW IT" : 


425 &€16)=255; &(17 )=255; &€ 18)=135; &€ 19 )=66; &( 21 )=255; &C 22 )=2553 &C 23 )=255 
426 FOR gd 127; BC=KX;NEXT X;FOR X=16TO 23; &CAI= @;NEXT * 

438 PRINT | THE BUILDING BLEW UP " 
4446 PRINT “ THE BOMB WAS AT " 

PRINT " LONG",A 
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